home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / P / Portfolio.cpt / Home / card_17208.txt < prev    next >
Text File  |  1988-01-24  |  9KB  |  456 lines
  1. -- card: 17208 from stack: in
  2. -- bmap block id: 9232
  3. -- flags: 4000
  4. -- background id: 26436
  5. -- name: Ideas
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 8000
  11. -- rect: left=101 top=79 right=127 bottom=196
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 26884 / 26884
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Art Ideas
  20. ----- HyperTalk script -----
  21. On MouseUp -- Stack
  22.   Global LongName
  23.   Put "Art Ideas" into LongName
  24.   LaunchStack
  25. End MouseUp
  26.  
  27. --
  28. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  29. --
  30.  
  31.  
  32.  
  33. -- part 2 (button)
  34. -- low flags: 00
  35. -- high flags: 8000
  36. -- rect: left=197 top=79 right=127 bottom=292
  37. -- title width / last selected line: 0
  38. -- icon id / first selected line: 27056 / 27056
  39. -- text alignment: 1
  40. -- font id: 0
  41. -- text size: 12
  42. -- style flags: 0
  43. -- line height: 16
  44. -- part name: Button Ideas
  45. ----- HyperTalk script -----
  46. On MouseUp -- Stack
  47.   Global LongName
  48.   Put "Button Ideas" into LongName
  49.   LaunchStack
  50. End MouseUp
  51.  
  52. --
  53. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  54. --
  55.  
  56.  
  57.  
  58. -- part 3 (button)
  59. -- low flags: 00
  60. -- high flags: 8000
  61. -- rect: left=293 top=79 right=127 bottom=388
  62. -- title width / last selected line: 0
  63. -- icon id / first selected line: 18814 / 18814
  64. -- text alignment: 1
  65. -- font id: 0
  66. -- text size: 12
  67. -- style flags: 0
  68. -- line height: 16
  69. -- part name: Card Ideas
  70. ----- HyperTalk script -----
  71. On MouseUp -- Stack
  72.   Global LongName
  73.   Put "Card Ideas" into LongName
  74.   LaunchStack
  75. End MouseUp
  76.  
  77. --
  78. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  79. --
  80.  
  81.  
  82.  
  83. -- part 4 (button)
  84. -- low flags: 00
  85. -- high flags: 8000
  86. -- rect: left=389 top=79 right=127 bottom=484
  87. -- title width / last selected line: 0
  88. -- icon id / first selected line: 7012 / 7012
  89. -- text alignment: 1
  90. -- font id: 0
  91. -- text size: 12
  92. -- style flags: 0
  93. -- line height: 16
  94. -- part name: Stack Ideas
  95. ----- HyperTalk script -----
  96. On MouseUp -- Stack
  97.   Global LongName
  98.   Put "Stack Ideas" into LongName
  99.   LaunchStack
  100. End MouseUp
  101.  
  102. --
  103. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  104. --
  105.  
  106.  
  107.  
  108. -- part 5 (button)
  109. -- low flags: 00
  110. -- high flags: 0000
  111. -- rect: left=101 top=128 right=176 bottom=196
  112. -- title width / last selected line: 0
  113. -- icon id / first selected line: 0 / 0
  114. -- text alignment: 1
  115. -- font id: 0
  116. -- text size: 12
  117. -- style flags: 0
  118. -- line height: 16
  119. -- part name: Clip Art
  120. ----- HyperTalk script -----
  121. On MouseUp -- Stack
  122.   Global LongName
  123.   Put "Clip Art" into LongName
  124.   LaunchStack
  125. End MouseUp
  126.  
  127. --
  128. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  129. --
  130.  
  131.  
  132.  
  133. -- part 6 (button)
  134. -- low flags: 00
  135. -- high flags: 0000
  136. -- rect: left=197 top=128 right=176 bottom=292
  137. -- title width / last selected line: 0
  138. -- icon id / first selected line: 0 / 0
  139. -- text alignment: 1
  140. -- font id: 0
  141. -- text size: 12
  142. -- style flags: 0
  143. -- line height: 16
  144. -- part name: Slide Show
  145. ----- HyperTalk script -----
  146. On MouseUp -- Stack
  147.   Global LongName
  148.   Put "Slide Show" into LongName
  149.   LaunchStack
  150. End MouseUp
  151.  
  152. --
  153. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  154. --
  155.  
  156.  
  157.  
  158. -- part 7 (button)
  159. -- low flags: 00
  160. -- high flags: 0000
  161. -- rect: left=293 top=128 right=176 bottom=388
  162. -- title width / last selected line: 0
  163. -- icon id / first selected line: 0 / 0
  164. -- text alignment: 1
  165. -- font id: 0
  166. -- text size: 12
  167. -- style flags: 0
  168. -- line height: 16
  169. -- part name: Book Shelf
  170. ----- HyperTalk script -----
  171. On MouseUp -- Stack
  172.   Global LongName
  173.   Put "Book Shelf" into LongName
  174.   LaunchStack
  175. End MouseUp
  176.  
  177. --
  178. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  179. --
  180.  
  181.  
  182.  
  183. -- part 8 (button)
  184. -- low flags: 00
  185. -- high flags: 0000
  186. -- rect: left=389 top=128 right=176 bottom=484
  187. -- title width / last selected line: 0
  188. -- icon id / first selected line: 0 / 0
  189. -- text alignment: 1
  190. -- font id: 0
  191. -- text size: 12
  192. -- style flags: 0
  193. -- line height: 16
  194. -- part name: File Index
  195. ----- HyperTalk script -----
  196. On MouseUp -- Stack
  197.   Global LongName
  198.   Put "File Index" into LongName
  199.   LaunchStack
  200. End MouseUp
  201.  
  202. --
  203. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  204. --
  205.  
  206.  
  207.  
  208. -- part 9 (button)
  209. -- low flags: 00
  210. -- high flags: 0000
  211. -- rect: left=101 top=177 right=225 bottom=196
  212. -- title width / last selected line: 0
  213. -- icon id / first selected line: 0 / 0
  214. -- text alignment: 1
  215. -- font id: 0
  216. -- text size: 12
  217. -- style flags: 0
  218. -- line height: 16
  219. -- part name: Plots
  220. ----- HyperTalk script -----
  221. On MouseUp -- Stack
  222.   Global LongName
  223.   Put "Plots" into LongName
  224.   LaunchStack
  225. End MouseUp
  226.  
  227. --
  228. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  229. --
  230.  
  231.  
  232.  
  233. -- part 10 (button)
  234. -- low flags: 00
  235. -- high flags: 0000
  236. -- rect: left=197 top=177 right=225 bottom=292
  237. -- title width / last selected line: 0
  238. -- icon id / first selected line: 0 / 0
  239. -- text alignment: 1
  240. -- font id: 0
  241. -- text size: 12
  242. -- style flags: 0
  243. -- line height: 16
  244. -- part name: Quotations
  245. ----- HyperTalk script -----
  246. On MouseUp -- Stack
  247.   Global LongName
  248.   Put "Quotations" into LongName
  249.   LaunchStack
  250. End MouseUp
  251.  
  252. --
  253. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  254. --
  255.  
  256.  
  257.  
  258. -- part 11 (button)
  259. -- low flags: 00
  260. -- high flags: 0000
  261. -- rect: left=293 top=177 right=225 bottom=388
  262. -- title width / last selected line: 0
  263. -- icon id / first selected line: 0 / 0
  264. -- text alignment: 1
  265. -- font id: 0
  266. -- text size: 12
  267. -- style flags: 0
  268. -- line height: 16
  269. -- part name: Documents
  270. ----- HyperTalk script -----
  271. On MouseUp -- Stack
  272.   Global LongName
  273.   Put "Documents" into LongName
  274.   LaunchStack
  275. End MouseUp
  276.  
  277. --
  278. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  279. --
  280.  
  281.  
  282.  
  283. -- part 12 (button)
  284. -- low flags: 00
  285. -- high flags: 0000
  286. -- rect: left=389 top=177 right=225 bottom=484
  287. -- title width / last selected line: 0
  288. -- icon id / first selected line: 0 / 0
  289. -- text alignment: 1
  290. -- font id: 0
  291. -- text size: 12
  292. -- style flags: 0
  293. -- line height: 16
  294. -- part name: HyperCalc
  295. ----- HyperTalk script -----
  296. On MouseUp -- Stack
  297.   Global LongName
  298.   Put "HyperCalc" into LongName
  299.   LaunchStack
  300. End MouseUp
  301.  
  302. --
  303. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  304. --
  305.  
  306.  
  307.  
  308. -- part 13 (button)
  309. -- low flags: 00
  310. -- high flags: 0000
  311. -- rect: left=101 top=226 right=274 bottom=196
  312. -- title width / last selected line: 0
  313. -- icon id / first selected line: 0 / 0
  314. -- text alignment: 1
  315. -- font id: 0
  316. -- text size: 12
  317. -- style flags: 0
  318. -- line height: 16
  319. -- part name: Phone
  320. ----- HyperTalk script -----
  321. On MouseUp -- Stack
  322.   Global LongName
  323.   Put "Phone" into LongName
  324.   LaunchStack
  325. End MouseUp
  326.  
  327. --
  328. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  329. --
  330.  
  331.  
  332.  
  333. -- part 14 (button)
  334. -- low flags: 00
  335. -- high flags: 0000
  336. -- rect: left=197 top=226 right=274 bottom=292
  337. -- title width / last selected line: 0
  338. -- icon id / first selected line: 0 / 0
  339. -- text alignment: 1
  340. -- font id: 0
  341. -- text size: 12
  342. -- style flags: 0
  343. -- line height: 16
  344. -- part name: Address
  345. ----- HyperTalk script -----
  346. On MouseUp -- Stack
  347.   Global LongName
  348.   Put "Address" into LongName
  349.   LaunchStack
  350. End MouseUp
  351.  
  352. --
  353. -- FOR 'PORTFOLIO' TO FUNCTION CORRECTLY; DO NOT MODIFY THIS SCRIPT!
  354. --
  355.  
  356.  
  357.  
  358. -- part 15 (button)
  359. -- low flags: 00
  360. -- high flags: 0000
  361. -- rect: left=293 top=226 right=274 bottom=388
  362. -- title width / last selected line: 0
  363. -- icon id / first selected line: 0 / 0
  364. -- text alignment: 1
  365. -- font id: 0
  366. -- text size: 12
  367. -- style flags: 0
  368. -- line height: 16
  369. -- part name: To Do
  370. ----- HyperTalk script -----
  371. on mouseUp
  372.   push card
  373.   visual effect zoom open
  374.   go to card "First Do" of "Datebook"
  375. end mouseUp
  376.  
  377.  
  378.  
  379. -- part 16 (button)
  380. -- low flags: 00
  381. -- high flags: 0000
  382. -- rect: left=389 top=226 right=274 bottom=484
  383. -- title width / last selected line: 0
  384. -- icon id / first selected line: 0 / 0
  385. -- text alignment: 1
  386. -- font id: 0
  387. -- text size: 12
  388. -- style flags: 0
  389. -- line height: 16
  390. -- part name: Daily
  391. ----- HyperTalk script -----
  392. on mouseUp
  393.   push card
  394.   visual effect zoom open
  395.   set lockScreen to true
  396.   go stack "DateBook"
  397.   goWeekly the seconds
  398.   set lockScreen to false
  399. end mouseUp
  400.  
  401.  
  402.  
  403.  
  404. -- part 17 (button)
  405. -- low flags: 00
  406. -- high flags: 0000
  407. -- rect: left=101 top=275 right=323 bottom=196
  408. -- title width / last selected line: 0
  409. -- icon id / first selected line: 0 / 0
  410. -- text alignment: 1
  411. -- font id: 0
  412. -- text size: 12
  413. -- style flags: 0
  414. -- line height: 16
  415. -- part name: Months
  416. ----- HyperTalk script -----
  417. on mouseUp
  418.   push card
  419.   get the seconds
  420.   convert it to dateItems
  421.   put ((item 1 of it) - 1987) *2 into whichSix
  422.   if item 2 of it > 6 then add 1 to whichSix
  423.   visual effect zoom open
  424.   if whichSix < 1 then go card 1 of stack "DateBook"
  425.   else if whichSix > 5 then go card 5 of stack "DateBook"
  426.   else
  427.     go to card whichSix of stack "DateBook"
  428.     send "bracketWeek" && the seconds to this card
  429.   end if
  430. end mouseUp
  431.  
  432.  
  433.  
  434. -- part contents for background part 107
  435. ----- text -----
  436. 11:05 AM
  437.  
  438. -- part contents for background part 108
  439. ----- text -----
  440. Fri, Jan 8, 1988
  441.  
  442. -- part contents for background part 105
  443. ----- text -----
  444. 100448
  445.  
  446. -- part contents for background part 106
  447. ----- text -----
  448. 0
  449.  
  450. -- part contents for background part 101
  451. ----- text -----
  452. Ideas
  453.  
  454. -- part contents for background part 102
  455. ----- text -----
  456. 1